PROGRAM main
  VAR
    arr : ARRAY[1..8] OF INT := [6,7,8,1,2,3,4,5];
  END_VAR

ARRAY1_SORT(arr);

END_PROGRAM
